home *** CD-ROM | disk | FTP | other *** search
- property spriteNum, offs
-
- on beginSprite me
- offs = []
- repeat with b = spriteNum to spriteNum + 6
- sprite(b).visible = 0
- append(offs, sprite(spriteNum).loc - sprite(b).loc)
- end repeat
- end
-
- on show me, pt
- global gSelectedUpgrade, gUpgradeSet
- sprite(spriteNum).loc = pt
- repeat with b = spriteNum to spriteNum + 6
- sprite(b).loc = sprite(spriteNum).loc - offs[b - spriteNum + 1]
- end repeat
- sprite(spriteNum).visible = 1
- sprite(86).visible = 1
- sprite(87).visible = 1
- upg = gSelectedUpgrade + ((gUpgradeSet - 1) * 10)
- put upg
- if upg = 1 then
- sprite(85).memberNum = 185
- else
- if upg = 16 then
- sprite(85).memberNum = 184
- else
- if (upg = 22) or (upg = 5) then
- sprite(85).memberNum = 186
- else
- if upg = 24 then
- sprite(85).memberNum = 187
- else
- if (upg = 35) or (upg = 27) then
- sprite(85).memberNum = 188
- else
- if (upg = 6) or (upg = 25) then
- sprite(85).memberNum = 189
- else
- if upg = 14 then
- sprite(85).memberNum = 190
- else
- if (upg = 23) or (upg = 33) then
- sprite(85).memberNum = 210
- else
- if upg = 34 then
- sprite(85).memberNum = 191
- else
- if (upg = 2) or (upg = 13) or (upg = 21) or (upg = 31) then
- sprite(85).memberNum = 192
- else
- if upg = 12 then
- sprite(85).memberNum = 193
- else
- if (upg = 3) or (upg = 4) or (upg = 11) then
- sprite(85).memberNum = 194
- else
- if (upg = 7) or (upg = 15) or (upg = 17) or (upg = 26) or (upg = 32) then
- sprite(85).memberNum = 195
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end if
- end
-
- on hide me
- repeat with b = spriteNum to spriteNum + 5
- sprite(b).visible = 0
- end repeat
- end
-